home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 22 / Amiga Format AFCD22 (Jan 1998, Issue 106).iso / -seriously_amiga- / shareware / archivers / xfx / install < prev    next >
Text File  |  1997-11-05  |  4KB  |  201 lines
  1.  
  2.  
  3.  
  4. ;               *******************************************
  5. ;               ****                                   ****
  6. ;               ****                xFX                ****
  7. ;               **** Multilanguage Installation Script ****
  8. ;               ****    © 1997, Alessandro Pedretti    ****
  9. ;               ****                                   ****
  10. ;               *******************************************
  11.  
  12.  
  13. ;           $VER:xFX_Install 1.1 (12.10.97) Alessandro Pedretti
  14.  
  15.  
  16.  
  17. ;
  18. ; Language selector (default: english)
  19. ;
  20.  
  21. (set #DefLang        0)
  22. (set #DefDoc        0)
  23. (if (= @language "italiano")
  24.   (set #DefLang        1)
  25. )
  26. (if (= @language "deutsch")
  27.   (set #DefLang        2)
  28. )
  29. (if (= @language "dansk")
  30.   (set #DefLang        3)
  31. )
  32.  
  33. (select #DefLang
  34.  
  35. ; English
  36.  
  37.   ((set #DefDoc        0)
  38.    (set #ARexxTxt    "Do you want install ARexx scripts ?")
  39.    (set #DirTxt        "Select the directory where the xFX drawer will be created.")
  40.    (set #LangDocTxt    "Please select your preferred language documentation")
  41.    (set #LangHelpTxt    "You must specify your language.")
  42.    (set #LangLocTxt    "Please select the language for localization")
  43.   )
  44.  
  45. ; Italiano
  46.  
  47.   ((set #DefDoc        1)
  48.    (set #ARexxTxt    "Vuoi installare gli scripts ARexx ?")
  49.    (set #DirTxt        "Selezionare la directory dove verrà creato il cassetto xFX.")
  50.    (set #LangDocTxt    "Selezionare il linguaggio per la documentazione")
  51.    (set #LangHelpTxt    "E' necessario specificare un linguaggio.")
  52.    (set #LangLocTxt    "Selezionare il linguaggio per la localizzazione")
  53.   )
  54.  
  55. ; Deutsch
  56.  
  57.   ((set #DefDoc        0)
  58.    (set #ARexxTxt    "Wollen Sie die ARexx Scripts installiren ?")
  59.    (set #DirTxt        "Bitte wählen Sie einen Platz für xFX. Ein Verzeichnis namens 'xFX' wird dort automatisch erzeugt.")
  60.    (set #LangDocTxt    "Bitte wählen Sie die Sprache für die Dokumentation aus.")
  61.    (set #LangHelpTxt    "Sie wählen die Sprache aus.")
  62.    (set #LangLocTxt    "Bitte wählen Sie die Sprache für die Programmen aus.")
  63.   )
  64.  
  65. ; Dansk
  66.  
  67.   ((set #DefDoc        0)
  68.    (set #ARexxTxt    "Ønsker du at installere ARexx eksempler ?")
  69.    (set #DirTxt        "Vælg stien hvor xFX skuffen skal oprettes.")
  70.    (set #LangDocTxt    "Vælg venligst dit foretrukne sprog for dokumentationen")
  71.    (set #LangHelpTxt    "Specificer hvilken dokumentation du ønsker at installere")
  72.    (set #LangLocTxt    "Vælg venligst sprog til brug i programmet")
  73.   )
  74. )
  75.  
  76.  
  77. ;
  78. ; Default xFX directory
  79. ;
  80.  
  81. (complete 20)
  82. (set xFXDir
  83.   (askdir
  84.     (prompt #DirTxt)
  85.     (help @askdir-help)
  86.     (default @default-dest)
  87.     (newpath)
  88.   )
  89. )
  90. (set xFXDir(tackon xFXDir "xFX"))
  91. (set @default-dest xFXDir)
  92.  
  93.  
  94. ;
  95. ; Documentation language
  96. ;
  97.  
  98. (complete 30)
  99. (set DocLang
  100.   (select 
  101.     (askchoice
  102.       (prompt  #LangDocTxt)
  103.       (help    #LangHelpTxt)
  104.       (choices "English" "Italiano")
  105.       (default #DefDoc)
  106.     )
  107.     "xFX-Eng.guide" "xFX-Ita.guide"
  108.   )
  109. )
  110. (set DocLang (cat "Docs/" DocLang))
  111.  
  112. ;
  113. ; Catalogs
  114. ;
  115.  
  116. (complete 40)
  117. (set CatLang
  118.   (askoptions
  119.     (prompt  #LangLocTxt)
  120.     (help    #LangHelpTxt)
  121.     (default 1)
  122.     (choices "English (Built-In)"
  123.              "Italiano"
  124.              "Dansk"
  125.     )
  126.   )
  127. )
  128.  
  129. ;
  130. ; Copy of files
  131. ;
  132.  
  133. (complete 50)
  134. (copyfiles
  135.   (source "")
  136.   (help    @copyfiles-help)
  137.   (infos)
  138.   (noposition)
  139.   (dest    @default-dest)
  140.   (choices "xFX"
  141.            "GuiX"
  142.   )
  143. )
  144.  
  145. (complete 60)
  146. (copyfiles
  147.   (source DocLang)
  148.   (help    @copyfiles-help)
  149.   (infos)
  150.   (noposition)
  151.   (dest    @default-dest)
  152.   (newname "xFX.guide")
  153. )
  154.  
  155. ;
  156. ; ARexx Scripts
  157. ;
  158.  
  159. (complete 70)
  160. (if (askbool (prompt #ARexxTxt) (help @askbool-help))
  161.   (copyfiles
  162.     (source "")
  163.     (help @copyfiles-help)
  164.     (infos)
  165.     (dest @default-dest)
  166.     (choices "ARexx")
  167.   )
  168. )
  169.  
  170. (complete 80)
  171. (set @default-dest (tackon @default-dest "Catalogs"))
  172. (copyfiles
  173.   (source "Catalogs")
  174.   (help    @copyfiles-help)
  175.   (dest    @default-dest)
  176.   (choices "xFX.cd"
  177.            "GuiX.cd"
  178.   )
  179. )
  180. (complete 90)
  181. (if (IN CatLang 1)
  182.   (copyfiles
  183.     (source   "Catalogs")
  184.     (help     @copyfiles-help)
  185.     (dest     @default-dest )
  186.     (choices  "Italiano")
  187.   )
  188. )
  189.  
  190. (if (IN CatLang 2)
  191.   (copyfiles
  192.     (source   "Catalogs")
  193.     (help     @copyfiles-help)
  194.     (dest     @default-dest )
  195.     (choices  "Dansk")
  196.   )
  197. )
  198.  
  199. (set @default-dest xFXDir)
  200. (complete 100)
  201.